home *** CD-ROM | disk | FTP | other *** search
/ Experimental BBS Explossion 3 / Experimental BBS Explossion III.iso / games / gscape.zip / EASY.CMD < prev    next >
OS/2 REXX Batch file  |  1992-07-15  |  8KB  |  1 lines

  1. >COMND                                                                          LOOK *                                  EXAMINE ROOM                            DO                                                                              SHOW                                                                            <                                                                               >COMND                                                                          S *                                     S AT 1 TO 2                             IF                                                                              AT                                                                              1                                                                               DO                                                                              GOTO                                                                            2                                                                               SHOW                                                                            <                                                                               >COMND                                                                          N *                                     N FROM 2 TO 1 WITHOUT TROPHY            IF                                                                              AT                                                                              2                                                                               GONE                                                                            1                                                                               302                                                                             DO                                                                              GOTO                                                                            1                                                                               SHOW                                                                            <                                                                               >COMND                                                                          N *                                     N FROM 2 TO 1 WITH TROPHY--WINS GAME    IF                                                                              EXIST                                                                           1                                                                               302                                                                             AT                                                                              2                                                                               DO                                                                              GOTO                                                                            1                                                                               SHOW                                                                            PRINT                                                                           1                                                                               END                                                                             <                                                                               >COMND                                                                          END *                                   END GAME IF ADVENTURER HAS TROPHY       IF                                      TELL HIM HE WON                         EXIST                                                                           1                                                                               302                                                                             DO                                                                              PRINT                                                                           1                                                                               END                                                                             >COMND                                                                          END *                                   JUST PLAIN END THE GAME ON COMMAND      DO                                                                              END                                                                             <                                                                               >COMND                                                                          QUIT *                                  QUIT THE GAME ON COMMAND                DO                                                                              QUIT                                                                            <                                                                               >COMND                                                                          INV *                                   SHOW INVENTORY CARRIED                  DO                                                                              INVEN                                                                           <                                                                               >COMND                                                                          GET TROPHY                              GET TROPHY/AWARD                        IF                                                                              GONE                                                                            1                                                                               302                                                                             DO                                                                              OBJ                                                                             1                                                                               302                                                                             INVEN                                                                           <                                                                               >COMND                                                                          GET *                                   GENERIC 'GET' FUNCTION-GETS ANYTHING    DO                                      THAT IS GETTABLE                        OBJ                                                                             0                                                                               302                                                                             INVEN                                                                           <                                                                               >COMND                                                                          * *                                     GENERIC GET-ALL 'I DON'T UNDERSTAND'    DO                                                                              PRINT                                                                           3                                                                               <